home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 4 / Mac Giga-ROM 4.0 - 1993.toast / FILES / GAM / C-D / DM_3000 / DM 3000 / card_16601.txt < prev    next >
Encoding:
Text File  |  1988-06-06  |  1.5 KB  |  71 lines
  1. -- card: 16601 from stack: in
  2. -- bmap block id: 9958
  3. -- flags: 4000
  4. -- background id: 2604
  5. -- name: FLOWER/SHOP
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=343 top=116 right=139 bottom=366
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 2730 / 2730
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: S/TO/OUT/FLOWER
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to card "OUT/FLOWER"
  23. end mouseUp
  24.  
  25.  
  26.  
  27.  
  28. -- part 2 (button)
  29. -- low flags: 00
  30. -- high flags: 2000
  31. -- rect: left=172 top=124 right=184 bottom=242
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: GUIDEBOOK
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   global inventory
  43.   if "fungicide" is in inventory then
  44.     put "You spot a nasty patch of fungus and neutralize it." into Msg
  45.     wait 3 seconds
  46.     if "guidebook" is in inventory then
  47.       put "The rack is empty." into Msg
  48.       wait 3 seconds
  49.       doMenu "Message"
  50.     else
  51.       put ", guidebook" after inventory
  52.       put inventory into background field "ShowMe"
  53.       put "You grab a handy guidebook." into Msg
  54.       wait 3 seconds
  55.       doMenu "Message"
  56.     end if
  57.   else
  58.     visual effect venetian blinds
  59.     go to card "YUCK"
  60.   end if
  61. end mouseUp
  62.  
  63.  
  64.  
  65. -- part contents for background part 6
  66. ----- text -----
  67. You are carrying: empty multicorder
  68.  
  69. -- part contents for background part 8
  70. ----- text -----
  71. 0